home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 20
/
Cream of the Crop 20 (Terry Blount) (1996).iso
/
os2
/
xdsn217.zip
/
BIN
/
url.cmd
< prev
next >
Wrap
OS/2 REXX Batch file
|
1996-07-10
|
737b
|
24 lines
/* Create a WebExplorer URL desktop object for XDS Web page */
Call RxFuncAdd 'SysLoadFuncs','RexxUtil','SysLoadFuncs'
Call SysLoadFuncs
Call SysQueryClassList "list."
do i=1 to list.0
if substr(list.i,1,15) = 'WebExplorer_Url' then do
say "WebExplorer_Url class found"
classname = 'WebExplorer_Url'
title = 'XDS Web Page'
location = '<WP_DESKTOP>'
setup = 'OBJECTID=<XDS_URL>;OPEN=NONE;LOCATOR=http://www.iis.nsk.su/xtech/xds/'
result = SysCreateObject(classname, title, location, setup, 'U')
if result = 1 then say 'Created: 'title
else say 'Not created: 'title' !!! Return code='result
exit
end
end
say "WebExplorer_Url class not found"
exit